00100 TOOT INV 0 10; 00200 P2 .4;P3 LIT/"TOOT"/"CLAR"/"BRIT"/"BUZZ"; P4 P1; P5 1.6; 00300 P6 1 C3 G5;P7 500;P8 F1;P9 F4;P10 F4;P11 F4;P12 F4;END; 00400 RUN;